home *** CD-ROM | disk | FTP | other *** search
- ;; Demo of new Fractint version 19 features
- ;; Created by Jonathan Osuch
- ;;
- ;; This demo goes through once and then exits.
- ;; The new bailout tests are demonstrated
- ;; The browser feature is demonstrated
- ;; The new outside=atan is demonstrated
- ;; The extended bailout value is demonstrated
- ;; The new ant fractal type is demonstrated
-
- WAIT 5
-
- ;; Set up first image
- ENTER
- WAIT 1.0
- DOWN * 2 ;; "x"
- "x"
- WAIT 1.0
- DOWN
- "y" ;; turn on floating point
- ;; comment out above the line if floating point is too slow
- ;; note that if you do, bailout=40000 will really be bailout=127
- ;; the integer limit for bailout
- DOWN * 2
- "0" ;; inside = 0
- DOWN * 2
- "new19001"
- WAIT 1.0
- ENTER
- ;; Set up the browse parameters for demo
- DOWN * 7 ;; Ctrl-B
- 2
- WAIT 1.0
- DOWN
- "n" ;; Don't ask about video mode
- WAIT 1.0
- DOWN * 6
- "new19*.gif"
- WAIT 1.0
- ENTER
-
- DOWN * 4 ;; "z"
- "z"
- WAIT 1.0
- DOWN * 2
- "r" ;; real
- WAIT 2.0
- ENTER
-
- ;; Make the first image
- DELETE
- WAIT 2.0
- F3
- CALCWAIT
- MESSAGE 2bailout test=real
- "s"
- CALCWAIT
- ;; Zoom in and save are for later browser use
- PAGEUP * 23
- WAIT 1.0
- 1115 * 19
- WAIT 1.0
- ENTER
- CALCWAIT
- "s"
- CALCWAIT
- PAGEUP * 10
- WAIT 1.0
- ENTER
- CALCWAIT
- "s"
- CALCWAIT
- "t"
- WAIT 1.0
- ENTER
- DOWN * 2
- "i" ;; imag
- WAIT 2.0
- ENTER
- CALCWAIT
- MESSAGE 2bailout test=imag
- PAGEUP * 25
- 1141 * 6
- 1115 * 7
- WAIT 2
- ENTER
- CALCWAIT
- "s"
- CALCWAIT
- "t"
- WAIT 1.0
- ENTER
- WAIT 1.0
- DOWN * 2
- "o" ;; or
- WAIT 2.0
- ENTER
- CALCWAIT
- MESSAGE 2bailout test=or
- "z"
- DOWN * 2
- "a" ;; and
- WAIT 2.0
- ENTER
- CALCWAIT
- MESSAGE 2bailout test=and
- ;; Start outside=atan demo
- "x"
- DOWN * 2
- "500"
- DOWN * 2
- "atan"
- WAIT 2.0
- ENTER
- "c"
- "l"
- "chroma"
- WAIT 1.0
- ENTER
- ESC
- CALCWAIT
- MESSAGE 2outside=atan
-
- "z"
- UP
- "40000"
- ENTER
- CALCWAIT
- MESSAGE 2bailout=40000
-
- Startbrowse:
- ;; Start demo of browse features
- "r"
- "new19001.gif"
- ENTER
- CALCWAIT
- "l"
- CALCWAIT
- WAIT 2.0
- ENTER
- CALCWAIT
- WAIT 2.0
- "l"
- CALCWAIT
- WAIT 2.0
- ENTER
- CALCWAIT
- WAIT 2.0
- "\"
- CALCWAIT
- WAIT 2.0
- "\"
- CALCWAIT
- WAIT 1.0
- "l"
- CALCWAIT
- WAIT 2.0
- RIGHT
- WAIT 2.0
- RIGHT
- WAIT 2.0
- ENTER
- CALCWAIT
- WAIT 5.0
- "t"
- "julia"
- ENTER
- DOWN * 2
- "m" ;; mod
- ENTER
- CALCWAIT
- ;; Start of ant demo
- 1 ;; ctrl-a
- ;;"1101"
- WAIT 1.0
- ENTER
- WAIT 20.0
- MESSAGE 2type=ant
-
- End:
- ESC
- ESC
- "y"
-